home *** CD-ROM | disk | FTP | other *** search
- #include <DialogMgr.h>
- #include <EventMgr.h>
- #include <StdFilePkg.h>
- #include <SetUpA4.h>
-
- #include "HexDump.h"
-
- SFReply reply;
-
- static Point where = { 100, 104 };
- static Boolean optionDown;
-
- pascal Boolean Look_For_Option(theDialog, theEvent, itemHit)
- DialogPtr theDialog;
- EventRecord *theEvent;
- int *itemHit;
- {
- SetUpA4();
- if (theEvent->what==mouseDown)
- optionDown = ((theEvent->modifiers & optionKey)!=0);
- RestoreA4();
- return false;
- }
-
- oldfilename( option )
- enum fork *option;
- {
- SFReply locReply;
-
- RememberA4();
- SFPGetFile(where, "\popen file:", 0L, -1, 0L, 0L, &locReply,
- -4000, Look_For_Option );
- if (!locReply.good)
- return 0;
- *option = optionDown ? resource : data;
- reply = locReply;
- return 1;
- }
-